home *** CD-ROM | disk | FTP | other *** search
/ Pascal Super Library / Pascal Super Library (CW International)(1997).bin / TABLES / MTABLE / MLBTYPES.PAS < prev    next >
Pascal/Delphi Source File  |  1994-03-16  |  632b  |  41 lines
  1. unit MLBTypes;
  2.  
  3. interface
  4.  
  5. uses
  6.   WinTypes;
  7.  
  8. type
  9.  
  10. TItemType = (ct_String, ct_BitMap);
  11.  
  12. pListItem = ^tListItem;
  13. tListItem = record
  14.   ItemID:   Integer;
  15.   FldName:  PChar;
  16.   Caption:  PChar;
  17.   ItemType: TItemType;
  18.   Part:     Real;
  19.   Align:    Word;
  20.   Wrap:     Word;
  21.   Sort:     Boolean;
  22. end;
  23.  
  24. pItemsArray = ^tItemsArray;
  25. tItemsArray = array [1..1] of tListItem;
  26.  
  27. pItemsList = ^tItemsList;
  28. tItemsList = record
  29.   ColNumber  :    Word;
  30.   Items      :    pItemsArray;
  31. end;
  32.  
  33. const
  34.   wm_SelChange    = wm_User + 139;
  35.   wm_DblClicked   = wm_User + 140;
  36.  
  37.   MaxFieldWidth = 255;
  38.  
  39. implementation
  40.  
  41. end.